object Form4: TForm4 Left = 347 Top = 204 BorderIcons = [] BorderStyle = bsSingle Caption = 'Setup Progress' ClientHeight = 150 ClientWidth = 331 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 10 Top = 95 Width = 311 Height = 10 Shape = bsBottomLine end object Label1: TLabel Left = 95 Top = 15 Width = 226 Height = 19 Caption = 'Label1' end object Image1: TImage Left = 10 Top = 16 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Label3: TLabel Left = 50 Top = 15 Width = 41 Height = 13 Caption = 'Copying:' end object Label2: TLabel Left = 95 Top = 35 Width = 226 Height = 13 AutoSize = False Caption = 'Label2' end object Label4: TLabel Left = 50 Top = 35 Width = 39 Height = 13 Caption = 'Copy to:' end object Button1: TButton Left = 246 Top = 115 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' TabOrder = 0 OnClick = Button1Click end object Panel2: TPanel Left = 10 Top = 65 Width = 311 Height = 21 BevelOuter = bvNone BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 1 object Bar: TGauge Left = 0 Top = 0 Width = 307 Height = 17 Align = alClient Color = clSilver Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] BorderStyle = bsNone ForeColor = clNavy ParentColor = False ParentFont = False Progress = 0 end end end